home *** CD-ROM | disk | FTP | other *** search
/ Aminet 21 / Aminet 21 (1997)(GTI - Schatztruhe)[!][Oct 1997].iso / Aminet / misc / emu / iecutil.lha / inc / exec / libraries.h < prev    next >
Encoding:
Text File  |  1997-05-06  |  1.4 KB  |  44 lines
  1. {$ifndef EXEC_LIBRARIES_H}
  2. CONST EXEC_LIBRARIES_H = 0;
  3. {$ifndef EXEC_NODES_H;include "exec/nodes.h";endif}
  4. CONST LIB_VECTSIZE = 6;
  5.       LIB_RESERVED = 4;
  6.       LIB_BASE = -LIB_VECTSIZE;
  7.       LIB_USERDEF = -30 {LIB_BASE-(LIB_RESERVED*LIB_VECTSIZE)};
  8.       LIB_NONSTD = -LIB_USERDEF;
  9.       LIB_OPEN = -6;
  10.       LIB_CLOSE = -12;
  11.       LIB_EXPUNGE = -18;
  12.       LIB_EXTFUNC = -24;
  13. TYPE p_Library = ^_Library;
  14.      _Library = record
  15.                   lib_Node: Node;
  16.                   lib_Flags,lib_pad: Byte;
  17.                   lib_NegSize, lib_PosSize, lib_Version, lib_Revision: Word;
  18.                   lib_IdString: stryng;
  19.                   lib_Sum: Long;
  20.                   lib_OpenCnt: Word;
  21.                 end;
  22. CONST LIBF_SUMMING = $1;
  23.       LIBF_CHANGED = $2;
  24.       LIBF_SUMUSED = $4;
  25.       LIBF_DELEXP = $8;
  26. {$endif}
  27. {$ifndef EXEC_LIBRARIES_LIB }
  28. Const EXEC_LIBRARIES_LIB = 26731;
  29. Library SysBase:
  30.  -78: Procedure InitStruct(a1: Ptr; a2,d0: Long);
  31.  -84: Function MakeLibrary(a0,a1,a2: Ptr; d0,d1: Long): p_Library;
  32.  -90: Procedure MakeFunctions(a0,a1,a2: Ptr);
  33. -396: Procedure AddLibrary(a1: p_Library);
  34. -402: Function RemLibrary(a1: p_Library): Long;
  35. -408: Function OldOpenLibrary(a1: stryng): p_Library;
  36. -414: Procedure CloseLibrary(a1: p_Library);
  37. -420: Procedure SetFunction(a1: p_Library; a0,d0: Long);
  38. -426: Function SumLibrary(a1: p_Library): Long;
  39. -552: Function OpenLibrary(a1: stryng; d0: Long): p_Library;
  40. end;
  41. {$endif}
  42.  
  43.  
  44.